home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1996 January / macformat-033.iso / mac / Education / Dorling Kindersley / DK Atlas / DATA / contentM.dir / 00134.ls < prev    next >
Encoding:
Text File  |  1995-04-25  |  343 b   |  13 lines
  1. on soundfader chan
  2.   if soundBusy(chan) = 1 then
  3.     set sttime to the ticks + the volume of sound 1
  4.     repeat while the volume of sound chan > chan
  5.       set the volume of sound chan to sttime - the ticks
  6.       updateStage()
  7.     end repeat
  8.     sound stop chan
  9.     set the volume of sound chan to 255
  10.     set the soundLevel to 5
  11.   end if
  12. end
  13.